Книги-online

назад | содержание | вперед

Метод PamtPicture

Метод paintpicture рисует (загружает) содержимое графических файлов имеющих расширение bmp, wmf, emf, cur, ico или dib, в формах или объектах типа picture. Метод имеет следующий синтаксис:

object.PaintPicture picture, xl, yl, width1, height1, x2, y2, width2, height2, opcode

где:

• object — объект, в котором применяется метод. Если объект не указан, то по умолчанию используется форма;
• picture — исходное изображение, которое будет размещено в объекте. Это должна быть ссылка на свойство picture данного или другого объекта;
• xl, yl — координаты левого верхнего угла области объекта для размещения исходного изображения;
• widthi, heightl— размер (ширина-и высота) области размещения исходного изображения.. Если размер области отличается от размера исходного изображения, то изображение пропорционально растягивается или сжимается;
• х2, y2 — координаты левого верхнего угла в исходном изображении для вставки в объект. Если заданы координаты, отличные от нуля, то будет вставлена часть исходного изображения;
• width2, height2 — размер (ширина и высота) вставляемой части исходного изображения;
• opcode — устанавливает режим вставки изображения при помощи констант из набора RasterOp (табл. 11.4). Задается только для работы с изображениями, имеющими расширение bmp.

Для работы метода с изображениями, имеющими расширение BMP, необходимо использовать константы из набора RasterOp для установки режима вставки изображения. Эти константы описаны в табл. 11.4.

При помощи отрицательных значений ширины (widthi) и высоты (heightl) можно перевернуть изображение вертикально или горизонтально.

Таблица 11.4. Набор констант RasterOp для метода PaintPicture

Константа	Значение	Описание
vbDstInvert	&H00550009	Инвертирует указанное изображение
vbMergeCopy	&HOOCOOOCA	Объединяет рисунок и изображение-источник
vbMe где Paint	&HOOBB0226	Объединяет инвертированное изображение источника с указанным изображением, используя оператор Or
vbNotSrcCopy	&H00330008	Копирует инвертированное изображение-источник в указанное изображение
vbNotSrcEraae	&H001100A6	Инвертирует результат объединения указанного изображения и изображения-источника, используя оператор Or
vbPatCopy	&HOOF00021L	Копирует рисунок в указанное изображение
vbPatInvert	&H005A0049L	Объединяет указанное изображение с рисунком, используя оператор Xог
vbPatPaint	&HOOFBOA09L	Объединяет инвертированное изображение источника с рисунком, используя оператор Or. Объединяет результирующее выражение в этой операции с указанным изображением с помощью оператора Or
vbSrcAnd	&H008800C6	Объединяет пикселы указанного изображения источника, используя оператор And
vbSrcCopy	&HOOCC0020	Копирует изображение-источник в указанное изображение
vbSrcErase	&H00440328	Инвертирует указанное изображение и объединяет результат с изображением-источником с помощью оператора And
vbSrcInvert	&H00660046	Объединяет пикселы указанного изображения и изображения-источника, используя оператор Хог
vbSrcPaint	&HOOEE0086	Объединяет пикселы указанного изображения и изображения-источника с помощью оператора Or

назад | содержание | вперед